close all
p=[5 3];
o=[0 0];

v1=[1 2];
a=p-10*v1;
b=p+10*v1;
ceuArrow(a,b,'r',2,'-',0)
axis square
axis([-1 12 -8 7])
ceuArrow([-1 0],[12 0],'b',1)
ceuArrow([0 -8],[0 7],'b',1)
grid on
xlabel('x_1')
ylabel('x_2')

v2=[1 -1/2];
c=p-13*v2;
d=p+13*v2;
ceuArrow(c,d,'g',2,'-',0)

text(6.75,5,'l_1')
text(9,1.4,'l_2')
